08013af0  4807 ldr r0, [$08013b10] (=$080f635c) - load $9000001 instead
08013af2  6839 ldr r1, [r7, #0x0] - change that to a bx r0
08013af4  1c0a add r2, r1, #0x0
08013af6  0091 lsl r1, r2, #0x02
08013af8  1840 add r0, r0, r1
08013afa  6801 ldr r1, [r0, #0x0]
08013afc  4a05 ldr r2, [$08013b14] (=$02029404)
08013afe  1c08 add r0, r1, #0x0
08013b00  1c11 add r1, r2, #0x0
08013b02  f7ef bl $0800384c

0800384c  b580 push {r7,lr}
0800384e  b082 add sp, -#0x8
08003850  466f mov r7, sp
08003852  6038 str r0, [r7, #0x0]
08003854  6079 str r1, [r7, #0x4]
08003856  4805 ldr r0, [$0800386c] (=$03003780)
08003858  6879 ldr r1, [r7, #0x4]
0800385a  6802 ldr r2, [r0, #0x0]
0800385c  6838 ldr r0, [r7, #0x0]
0800385e  f09a bl $0809df18

.org $9000000
ldr r0, [pc, #0x17] ;$80f6358 ;base
ldr r3, [pc, #0x18] ;$3000000 ;stack
str r0, [r3, #0x0]
ldr r1, [pc, #0x18] ;$1FFFFFF ;WRAM pool init
ldr r3, [pc, #0x18] ;$900000d
mov lr, r3 ;lol loop
.org $900000d
ldr r3, [pc, #0x15] ;$3000000
add r1, #0x1
ldr r2, [pc, #0x17] ;$203E800
cmp r1, r2
bgt End ;prevent overflow
mov r2, #0xff
strb r2, [r1, #0x0]
add r1, #0x01
strb r2, [r1, #0x0]
add r1, #0x1 ;line breaks
ldr r0, [r3, #0x0]
add r0, #0x4
str r0, [r3, #0x0] ;pointer update
push {r3, r4}
mov r4, #0x8
Pointer:
cmp r4, #0x0
beq Done
ldr r2, [pc, #0x11] ;$9000400 ;text value table base
lsr r3, r0, #0x1c
lsl r3, r3, #0x1
add r2, r2, r3
ldrh r2, [r2, #0x0]
strh r2, [r1, #0x0]
add r1, #0x2
lsl r0, r0, #0x4
sub r4, #0x1
b Pointer
Done:
pop {r3, r4}
mov r2, #0xff
strb r2, [r1, #0x0]
add r1, #0x01
strb r2, [r1, #0x0]
add r1, #0x1 ;line breaks again
ldr r0, [r3, #0x0]
ldr r0, [r0, #0x0]
ldr r2, [pc, #0x09] ;$3003780
ldr r2, [r2, #0x0]
str r0, [r7, #0x0]
str r1, [r7, #0x4]
bx r2 ;get that text in there!
End:
b End

Pre decomp reg status:
R00=08804c76 R04=00000000 R08=00000014 R12=00000100
R01=02029404 R05=02021b08 R09=00000000 R13=03007d3c
R02=0300323c R06=02029404 R10=00000000 R14=08003863
R03=0000008d R07=03007d3c R11=03007dfc R15=0809df1a

Post decomp reg status:
R00=08804b1b R04=00000000 R08=00000016 R12=00000100
R01=0202941a R05=02021b08 R09=00000000 R13=03007d3c
R02=00000000 R06=02029404 R10=00000000 R14=08003863
R03=00000004 R07=03007d3c R11=03007dfc R15=08003864